home *** CD-ROM | disk | FTP | other *** search
/ 3D Games (Spidla) / 3dhry2.iso / InterBingo 1.0 / InterBingoSetup.exe / BingoInstaller.swf / scripts / DefineSprite_10 / frame_1 / DoAction.as
Encoding:
Text File  |  2002-07-25  |  520 b   |  31 lines

  1. function TrackProgress()
  2. {
  3.    ProgMov = eval(_root.ResLevel + ".ProgressMeter");
  4.    trace("Progress:" + ProgMov._name);
  5.    Tracking = true;
  6.    UpdateMeter();
  7. }
  8. function StopTracking()
  9. {
  10.    Tracking = false;
  11.    stop();
  12. }
  13. function UpdateMeter()
  14. {
  15.    trace("Updating Meter");
  16.    ProgMov.SetStatus(Status);
  17.    ProgMov.SetBar(Progress);
  18.    ProgMov.SetComponent(ComponentName);
  19.    ProgMov.SetSpeed(KBS);
  20.    ProgMov.SetETA(ETA);
  21.    play();
  22. }
  23. if(Tracking)
  24. {
  25.    UpdateMeter();
  26. }
  27. else
  28. {
  29.    stop();
  30. }
  31.